home *** CD-ROM | disk | FTP | other *** search
/ Mastering Public Speaking / Mastering Public Speaking.iso / pc / Click Here.exe / Click Here.dxr / Internal_4_Rollover Member Change.ls < prev    next >
Encoding:
Text File  |  2003-05-13  |  1.1 KB  |  42 lines
  1. property spriteNum, mySprite, myStandardMember, myRollovermember
  2.  
  3. on getBehaviorDescription me
  4.   return "ROLLOVER MEMBER CHANGE" & RETURN & RETURN & "Change the sprite's cast member when the mouse rolls over the sprite." & RETURN & RETURN & "PARAMETERS:" & RETURN & "* Rollover cast member"
  5. end
  6.  
  7. on getBehaviorTooltip me
  8.   return "Use with graphic members." & RETURN & RETURN & "Swaps a sprite's cast member on rollover."
  9. end
  10.  
  11. on beginSprite me
  12.   mySprite = sprite(me.spriteNum)
  13.   myStandardMember = mySprite.member
  14. end
  15.  
  16. on mouseEnter me
  17.   mySprite.member = myRollovermember
  18. end
  19.  
  20. on mouseLeave me
  21.   mySprite.member = myStandardMember
  22.   set the member of sprite the currentSpriteNum to member("supporthead")
  23. end
  24.  
  25. on isOKToAttach me, aSpriteType, aSpriteNum
  26.   case aSpriteType of
  27.     #graphic:
  28.       return 1
  29.     #script:
  30.       return 0
  31.   end case
  32. end
  33.  
  34. on getPropertyDescriptionList
  35.   if the currentSpriteNum = 0 then
  36.     exit
  37.   end if
  38.   theMember = sprite(the currentSpriteNum).member
  39.   theMemberNumber = theMember.number
  40.   return [#myRollovermember: [#comment: "Display which member on rollover?", #format: #graphic, #default: member(theMemberNumber + 1)]]
  41. end
  42.